/ MacGames Sampler / PHT MacGames Bundle.iso / MacSource Folder / Samples from the CD / Editors / emacs / Emacs-1.14b1 / lisp / mac / Events.elc

< prev

next >

MacOS 8.1

Win98

DOS

browse contents

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0a 45 76 65 6e 74 73 | 2e 65 6c 63 00 00 00 00 |..Events|.elc....|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 64 45 4c 43 45 4d 41 | 43 01 00 00 00 00 00 00 |.dELCEMA|C.......|
|00000050| 00 00 00 00 00 03 7f 00 | 00 01 3c a9 83 3f 7d a9 |........|..<..?}.|
|00000060| 97 dd fc 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 d8 0b 00 00 |........|........|
|00000080| 0a 28 63 3a 64 65 66 73 | 74 72 75 63 74 20 45 76 |.(c:defs|truct Ev|
|00000090| 65 6e 74 52 65 63 6f 72 | 64 20 28 28 73 68 6f 72 |entRecor|d ((shor|
|000000a0| 74 20 77 68 61 74 29 20 | 28 6c 6f 6e 67 20 6d 65 |t what) |(long me|
|000000b0| 73 73 61 67 65 29 20 28 | 6c 6f 6e 67 20 77 68 65 |ssage) (|long whe|
|000000c0| 6e 29 20 28 50 6f 69 6e | 74 20 77 68 65 72 65 29 |n) (Poin|t where)|
|000000d0| 20 28 73 68 6f 72 74 20 | 6d 6f 64 69 66 69 65 72 | (short |modifier|
|000000e0| 73 29 29 29 0a 0a 28 64 | 65 66 63 6f 6e 73 74 20 |s)))..(d|efconst |
|000000f0| 6e 75 6c 6c 45 76 65 6e | 74 20 30 29 0a 0a 28 64 |nullEven|t 0)..(d|
|00000100| 65 66 63 6f 6e 73 74 20 | 6d 6f 75 73 65 44 6f 77 |efconst |mouseDow|
|00000110| 6e 20 31 29 0a 0a 28 64 | 65 66 63 6f 6e 73 74 20 |n 1)..(d|efconst |
|00000120| 6d 6f 75 73 65 55 70 20 | 32 29 0a 0a 28 64 65 66 |mouseUp |2)..(def|
|00000130| 63 6f 6e 73 74 20 6b 65 | 79 44 6f 77 6e 20 33 29 |const ke|yDown 3)|
|00000140| 0a 0a 28 64 65 66 63 6f | 6e 73 74 20 6b 65 79 55 |..(defco|nst keyU|
|00000150| 70 20 34 29 0a 0a 28 64 | 65 66 63 6f 6e 73 74 20 |p 4)..(d|efconst |
|00000160| 61 75 74 6f 4b 65 79 20 | 35 29 0a 0a 28 64 65 66 |autoKey |5)..(def|
|00000170| 63 6f 6e 73 74 20 75 70 | 64 61 74 65 45 76 74 20 |const up|dateEvt |
|00000180| 36 29 0a 0a 28 64 65 66 | 63 6f 6e 73 74 20 64 69 |6)..(def|const di|
|00000190| 73 6b 45 76 74 20 37 29 | 0a 0a 28 64 65 66 63 6f |skEvt 7)|..(defco|
|000001a0| 6e 73 74 20 61 63 74 69 | 76 61 74 65 45 76 74 20 |nst acti|vateEvt |
|000001b0| 38 29 0a 0a 28 64 65 66 | 63 6f 6e 73 74 20 6f 73 |8)..(def|const os|
|000001c0| 45 76 74 20 31 35 29 0a | 0a 28 64 65 66 63 6f 6e |Evt 15).|.(defcon|
|000001d0| 73 74 20 6d 44 6f 77 6e | 4d 61 73 6b 20 32 29 0a |st mDown|Mask 2).|
|000001e0| 0a 28 64 65 66 63 6f 6e | 73 74 20 6d 55 70 4d 61 |.(defcon|st mUpMa|
|000001f0| 73 6b 20 34 29 0a 0a 28 | 64 65 66 63 6f 6e 73 74 |sk 4)..(|defconst|
|00000200| 20 6b 65 79 44 6f 77 6e | 4d 61 73 6b 20 38 29 0a | keyDown|Mask 8).|
|00000210| 0a 28 64 65 66 63 6f 6e | 73 74 20 6b 65 79 55 70 |.(defcon|st keyUp|
|00000220| 4d 61 73 6b 20 31 36 29 | 0a 0a 28 64 65 66 63 6f |Mask 16)|..(defco|
|00000230| 6e 73 74 20 61 75 74 6f | 4b 65 79 4d 61 73 6b 20 |nst auto|KeyMask |
|00000240| 33 32 29 0a 0a 28 64 65 | 66 63 6f 6e 73 74 20 75 |32)..(de|fconst u|
|00000250| 70 64 61 74 65 4d 61 73 | 6b 20 36 34 29 0a 0a 28 |pdateMas|k 64)..(|
|00000260| 64 65 66 63 6f 6e 73 74 | 20 64 69 73 6b 4d 61 73 |defconst| diskMas|
|00000270| 6b 20 31 32 38 29 0a 0a | 28 64 65 66 63 6f 6e 73 |k 128)..|(defcons|
|00000280| 74 20 61 63 74 69 76 4d | 61 73 6b 20 32 35 36 29 |t activM|ask 256)|
|00000290| 0a 0a 28 64 65 66 63 6f | 6e 73 74 20 68 69 67 68 |..(defco|nst high|
|000002a0| 4c 65 76 65 6c 45 76 65 | 6e 74 4d 61 73 6b 20 31 |LevelEve|ntMask 1|
|000002b0| 30 32 34 29 0a 0a 28 64 | 65 66 63 6f 6e 73 74 20 |024)..(d|efconst |
|000002c0| 6f 73 4d 61 73 6b 20 2d | 33 32 37 36 38 29 0a 0a |osMask -|32768)..|
|000002d0| 28 64 65 66 63 6f 6e 73 | 74 20 61 63 74 69 76 65 |(defcons|t active|
|000002e0| 46 6c 61 67 20 31 29 0a | 0a 28 64 65 66 63 6f 6e |Flag 1).|.(defcon|
|000002f0| 73 74 20 62 74 6e 53 74 | 61 74 65 20 31 32 38 29 |st btnSt|ate 128)|
|00000300| 0a 0a 28 64 65 66 63 6f | 6e 73 74 20 63 6d 64 4b |..(defco|nst cmdK|
|00000310| 65 79 20 32 35 36 29 0a | 0a 28 64 65 66 63 6f 6e |ey 256).|.(defcon|
|00000320| 73 74 20 73 68 69 66 74 | 4b 65 79 20 35 31 32 29 |st shift|Key 512)|
|00000330| 0a 0a 28 64 65 66 63 6f | 6e 73 74 20 61 6c 70 68 |..(defco|nst alph|
|00000340| 61 4c 6f 63 6b 20 31 30 | 32 34 29 0a 0a 28 64 65 |aLock 10|24)..(de|
|00000350| 66 63 6f 6e 73 74 20 6f | 70 74 69 6f 6e 4b 65 79 |fconst o|ptionKey|
|00000360| 20 32 30 34 38 29 0a 0a | 28 64 65 66 63 6f 6e 73 | 2048)..|(defcons|
|00000370| 74 20 63 6f 6e 74 72 6f | 6c 4b 65 79 20 34 30 39 |t contro|lKey 409|
|00000380| 36 29 0a 0a 28 64 65 66 | 63 6f 6e 73 74 20 63 68 |6)..(def|const ch|
|00000390| 61 72 43 6f 64 65 4d 61 | 73 6b 20 32 35 35 29 0a |arCodeMa|sk 255).|
|000003a0| 0a 28 64 65 66 74 72 61 | 70 20 57 61 69 74 4d 6f |.(deftra|p WaitMo|
|000003b0| 75 73 65 55 70 20 28 22 | 61 39 37 37 22 29 20 6e |useUp ("|a977") n|
|000003c0| 69 6c 20 63 68 61 72 29 | 0a 0a 28 64 65 66 74 72 |il char)|..(deftr|
|000003d0| 61 70 20 47 65 74 4d 6f | 75 73 65 20 28 22 61 39 |ap GetMo|use ("a9|
|000003e0| 37 32 22 29 20 28 28 6d | 6f 75 73 65 4c 6f 63 20 |72") ((m|ouseLoc |
|000003f0| 61 64 64 72 65 73 73 29 | 29 20 6e 69 6c 29 0a 00 |address)|) nil)..|
|00000400| 00 00 01 00 00 00 01 0a | 00 00 00 0a 00 00 00 32 |........|.......2|
|00000410| 64 65 66 75 6e 20 64 69 | 72 65 64 2d 73 69 6d 70 |defun di|red-simp|
|00000420| 6c 65 2d 73 75 62 64 69 | 72 2d 61 6c 69 73 74 20 |le-subdi|r-alist |
|00000430| 0a 45 76 65 6e 74 73 2e | 65 6c 63 00 02 00 00 00 |.Events.|elc.....|
|00000440| 64 45 4c 43 45 4d 41 43 | 01 00 01 d4 00 00 00 00 |dELCEMAC|........|
|00000450| 00 00 64 45 4c 43 45 4d | 41 43 01 00 01 d4 00 00 |..dELCEM|AC......|
|00000460| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000470| 00 00 a9 83 3f 7d 00 00 | 03 7f 00 00 01 3c 72 2d |....?}..|.....<r-|
|00000480| 61 6c 69 73 74 20 70 6f | 69 6e 74 2d 6d 69 6e 2d |alist po|int-min-|
|00000490| 6d 61 72 6b 65 72 5d 20 | 35 29 29 0a 0a 28 64 65 |marker] |5))..(de|
|000004a0| 66 75 6e 20 64 69 72 65 | 64 2d 62 75 69 6c 64 2d |fun dire|d-build-|
|000004b0| 73 75 62 64 69 72 2d 61 | 6c 69 73 74 20 6e 69 6c |subdir-a|list nil|
|000004c0| 20 22 5c 0a 42 75 69 6c | 64 20 60 64 69 72 65 64 | "\.Buil|d `dired|
|000004d0| 2d 73 75 62 64 69 72 2d | 61 6c 69 73 74 27 20 62 |-subdir-|alist' b|
|000004e0| 79 20 70 61 72 73 69 6e | 67 20 74 68 65 20 62 75 |y parsin|g the bu|
|000004f0| 66 66 65 72 20 61 6e 64 | 20 72 65 74 75 72 6e 20 |ffer and| return |
|00000500| 00 00 00 06 05 45 6d 61 | 63 73 00 00 01 00 00 00 |.....Ema|cs......|
|00000510| 01 0a 00 00 00 0a 00 00 | 00 32 00 52 68 34 05 e2 |........|.2.Rh4..|
|00000520| 00 00 00 1c 00 32 00 00 | 53 54 52 20 00 00 00 0a |.....2..|STR ....|
|00000530| bf f4 ff ff 00 00 00 00 | 00 58 ad dc 00 00 00 00 |........|.X......|
|00000540| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000550| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000560| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000570| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+